home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib13.dsk / DOUBLE CAT-STANDARD.bas < prev    next >
BASIC Source File  |  2023-02-26  |  589b  |  25 lines
  1. 1  REM  ***********************
  2. 2  REM  * DOUBLE CAT-STANDARD *
  3. 3  REM  * BY MARK K. MCKIBBIN *
  4. 4  REM  * COPYRIGHT (C) 1983  *
  5. 5  REM  * BY MICROSPARC, INC. *
  6. 6  REM  * LINCOLN, MA. 01773  *
  7. 7  REM  ***********************
  8. 10  POKE  -21084,42
  9. 20  FOR A = 44456 TO 44461
  10. 30  READ D
  11. 40  POKE A,D
  12. 50  NEXT A
  13. 60  FOR A = 44483 TO 44488
  14. 70  READ D
  15. 80  POKE A,D
  16. 90  NEXT A
  17. 100  FOR A = 44545 TO 44554
  18. 110  READ D
  19. 120  POKE A,D
  20. 130  NEXT A
  21. 140  POKE 44567,15
  22. 150  POKE 44605,44
  23. 155  POKE 44592,160
  24. 160  DATA  169,141,32,4,174,234,169,141,32,4,174,234,76,19,174,32,237,253,32,237,253,96
  25. 170  END